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Current Advertising Rates 


Sorry, it is going up again. For the October 1982 issue the 
price will be $75 for a full page, $40 for a half page. To be 
included, I must receive your camera-ready copy by September 
20th. 


What if you move? 


We mail the Apple Assembly Line by bulk mail, unless you have 
paid for First Class or Overseas postage. If you move, the 
post office will NOT forward AAL to your new address. Please 
let us know your new address as soon as you find out what it 
will be, so you will not miss a single issue! 


Quarterly Disks 


As you no doubt know, every three months we gather all the 
source code printed during the quarter on one disk. You can 
save countless hours of typing and proofreading for only $15 
per quarter. Some have elected to establish a standing order 
with their credit card, or even to prepay for a year at a time. 


New Products 


ES-CAPE: For really painless Applesoft programming, you need a 
complete line editor, global search and replace, automatic line 
numbers, and keyboard macros. At least. ES-CAPE gives you all 
these and more! 


The retail price is $60, but AAL subscribers can get it for 
only $40 until the end of September. Hurry! 


We wrote a nice little reference manual of about 22 pages, but 
ES-CAPE is so easy to use and remember that you won't need the 
book very long! 


If you already purchased AED II (the earlier version of this 

editor), Bill Linn has an upgrade offer: Send him your disk 

plus $10, and you will get the new versions (both regular and 
language card), the manual, and the reference card. 


68000 Macro Cross Assembler: Not content with producing only 
three cross assemblers based on the S-C Macro Assembler, Bobby 
Deen has now completed the biggest one of all! This one costs 
$50, and allows you to assemble Motorola 68000 source programs 
in your Apple, with all the friendly features of the S-C 
package. 


SYNASSEMBLER: Synapse Software has just started marketing a 
conversion of the S-C Assembler II Version 4.0 for the Atari 
800 or 400. You need 48K RAM and at least one disk drive. The 
conversion was done by Steve Hales, of Livermore, California. 
He added global replace and copy commands, so this version 
falls somewhere between the Apple version 4.0 and the new Macro 
version. It assembles at about 6500 lines per minute, which is 
from 50 to over 100 times faster than the Atari ASM/ED program. 


Since the Atari does not have nice monitor commands built-in, 
like the Apple does, Steve added a complete set of monitor 
commands to SYNASSEMBLER. They look exactly like the Apple 
monitor commands, except that he added some new ones to allow 
reading and writing a range of disk sectors, delete the tape 
I/O commands, and included the old Step and Trace commands 
which were in Apples before the Autostart ROM. 


The price is only $49.95 on disk. A ROM version is available 


by special order for $89.95. I will carry these, if you want 
to order from me, 
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Assembler DirectiveS....cccccccccccccccscsee se BOD Sander-Cederlof 


Of all the Apple assemblers on the market, it seems that no two 
have exactly the same list of assembler directives. 

Directives, also called "pseudo-ops", are used to control the 
assembly process and to define data in your programs. When you 
see a listing of an assembly language program in a magazine, or 
in this newsletter, or in a book on 6502 programming, you may 
have to translate the directives to fit the assembler you own. 


All directives in the S-C Macro Assembler begin with a period. 
This helps to distinguish them visually from 6502 and SWEET-16 
opcodes. This same convention is used by Carl Moser's (Eastern 
House Software) MAE assembler, by the MOS Technology and 
Rockwell assemblers, and some others. Most other assemblers 
use 3- or 4-character mnemonics beginning with a letter. Which 
combination of letters cause the assembler to perform a 
particular function is not standardized at all, but there are 
enough similarities to make programs readable once you learn 
the general techniques. 


What follows is an alphabetical listing of all the directives I 
have encountered in various manuals and magazine-published 
programs. The assemblers represented are coded like this: 


B = Big Mac SC= S-C Macro Assembler 
K = DOS Tool Kit T = TED II 

L = Lisa W = Weller's Assembler 
M = Merlin 


In each case I have given a brief description of the directive, 
and tried to show how to do the same thing in the S-C Macro 
Assembler. I suggest looking up the S-C directives in the 
reference manual if you are not sure exactly how to use them. 


ADR ADdRess L 
Stores the expression as an address, low-order byte first. 
SC: Use .DA directive 


ASC ASCii string definition L K T BM 
SC: Use .AS or .AT directives. 


AST ASTerisks TBM 

Prints the number of asterisks specified on the listing. Used 
to save space in the source file. 

SC: Not needed, because SC compresses repeated characters 
automatically. 


BLK BLinKing characters L 

Generates a string of characters in Apple's FLASH code. 

SC: Not available, but a combination of .AS and .HS directives 
will do the job. 


BYT BYTe data L 


Define data value, storing low-order byte only. 
SC: Use .DA with "#" before value, 
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Decision 
Decision Systems 


S P.O. Box 13006 
ystems Denton, TX 76203 
817 {382-6353 


DIS-ASSEMBLER 


DSA-DS dis-assembles Apple machine language programs into forms 
compatible with LISA, S-C ASSEMBLER (3.2 or 4.0), Apple's TOOL- 
KIT ASSEMBLER and others. DSA-DS dis-assembles instructions or 
data. Labels are generated for referenced locations within the 
machine language program. 

$25, Disk, Applesoft (32K, ROM or Language card) 


OTHER PRODUCTS 


ISAM-DS is an integrated set of Applesoft routines that gives indexed file capabilities 
to your BASIC programs. Retrieve by key, partial key or sequentially. Space from 
deleted records is automatically reused. Capabilities and performance that match 
products costing twice as much. 

$50 Disk, Applesoft. 


PBASIC-DS is a sophisticated preprocessor for structured BASIC. Use advanced 
logic constructs such as IF...ELSE..., CASE, SELECT, and many more. Develop 
programs for Integer or Applesoft. Enjoy the power of structured logic at a fraction of 
the cost of PASCAL. 

$35. Disk, Applesoft (48K, ROM or Language Card). 


FORM-DS is a complete system for the definition of input and output froms. FORM- 
DS supplies the automatic checking of numeric input for acceptable range of values, 
automatic formatting of numeric output, and many more features. 

$25 Disk, Applesoft (32K, ROM or Language Card). 


UTIL-DS is a set of routines for use with Applesoft to format numeric output, selec- 
tively clear variables (Applesoft’s CLEAR gets everything), improve error handling, 
and interface machine language with Applesoft programs. Includes a special load 
routine for placing machine language routines underneath Applesoft programs. 

$25 Disk, Applesoft. 


SPEED-DS is a routine to modify the statement linkage in an Applesoft program to 
speed its execution. Improvements of 5-20% are common. As a bonus, SPEED-DS 
includes machine language routines to speed string handling and reduce the need for 
garbage clean-up. Author: Lee Meador. 

$15 Disk, Applesoft (32K, ROM or Language Card). 


(Add $4.00 for Foreign Mail) 


*Appie ll is a registered trademark of the Apple Computer Co. 
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CHK CHecKsum BM 
SC: Not available 


CHN CHaiN to next source K 
SC: Use .IN directive. 


CHR Set CHaR for REP directive K 

Used to create fancy comments with repeated strings; saves 
Space in source file. 

SC: Not necessary, because SC compresses repeated characters 
automatically. 


~DA DAta definition L SC 
Apparently Randy borrowed this one from me. (See the reviews 
he wrote in Call APPLE some time ago.) 


DA Define Address TBM 
Defines a 16-bit value with low-byte first. 
SC: Use .DA directive. 


DATA DATA definition W 
Defines numeric and ASCII data bytes 
SC: Use .DA directive, preceding each value with "#". 


DB Data Byte T 
Defines a data value, only using the low byte of the 
expression, 


SC: Use .DA directive with "#" before the expression. 


DBL DouBLe precision data W 
Defines 16-bit data values. 
SC: Use .DA directive. 


DBY Double BYte data L 

Generates a 16-bit value and stores it high-byte first. 

SC: Not directly available, but use .DA as follows: 
-DA /expression, ¢expression 


DCI Define Characters Immed L K T B M 

Stores string with sign bit of last byte opposite that of the 
rest of the bytes. 

SC: Use .AT directive. 


DCM DOS CoMmand L 

Issue a DOS command during assembly. Usually used to BSAVE a 
section of the generated object code. 

SC: Use .TF directive 


DDB Define Double Byte K BM 
Defines a 16-bit value which is stored with the high-byte 
first. 
SC: Not directly available, but use .DA as follows: 
~-DA /expression, texpression 


DEND Dummy END K 


Marks end of a dummy section (see DSECT). 
SC: Not available 
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APPLE PERIPHERALS ARE OUR ONLY BUSINESS 


TIME II 
THE MOST POWERFUL, EASIEST TO USE CLOCK FOR YOUR APPLE 


@ Time in hours, Minutes and seconds. 
@ Date with year, month, day of week and leap year. 


@ Will enhance programs for accounting, time and energy management. 
remote control of appliances. laboratory analysis. process control, 
and more. 


@ 24-hour military format or 12-hour with AM/PM indication. 


@ User selectable interrupts permit foreground/background operation 
of two programs simultaneously 


@ Crystal controlled for 0005% accuracy. 
@ Easy programming in basic. 


@On board battery backup power for over four 
operation (battery charges when Apple 1s on). 


ta 
le tesa® 


@ Twenty-seven page operating manual included with many examples 
of programs to use with your Apple in any configuration. 

@ Includes disk containing a DOS Dater and many other time oriented 
utilities plus over 25 user contributed programs at no extra cost. 


PRICE $129.00 


tad 


SUPER MUSIC SYNTHESIZER 


@ Complete 16 volce music synthesizer on one card. Just plug it into 
your Apple, connect the audio cable (supplied) to your stereo and 
boot the disk supplied and you are ready to input and play songs. 

@ It's easy to program music with our compose software. You will start 
right away at inputting your favorite songs. The Hi-Res screen 
shows what you have entered in standard sheet music format. 


@We give you lots of software. In addition to Compose and Play 
programs. the disk is filled with songs ready to run. 


@ Easy to program in basic to generate compiex sound effects. 

@ Four white noise generators which are great for sound effects. 

@ Plays music in true stereo as well as true discrete quadraphonic. 
@ Envelope control. 


@ Will play songs wrilten for ALF synthesizer (ALF software will not 
take advantage of all the features of this board. Their software 
sounds the same in our synthesizer.) 

@ Automatic shutoff on power-up or if reset is pushed. 


@ Many many more features. 


PRICE $159.00 


ANALOG TO DIGITAL CONVERTER 


@Eliminates The Need To Wait For 
Conversion (just PEEK at data) 


@ A/D Process Totally Transparent to Apple 
(looks like memory) 


@ 8 Channels 

@ 8 Bit Resolution 

@ On Board Memory 

@ Ratiometric Capability 
@ Fast Conversion (.078 ms per channel) 


The analog to digital conversion takes place on a continuous, channel 
sequencing basis. Data 1s automatically transferred to on board 
memory at the end of each conversion. No A/D converter could be 
easier to use. 


Our A/D board comes standard with 0. 10V full scale inputs. These 
inputs can be changed by the user to 0. -10V, or -5V, +5V or other 
ranges as needed. 

The user connector has +12 and 12 volts on it so you Can power your 
sensors (These power sources can be turned off with on board dip 
switch) 

Accuracy 03%. Input Resistance 
A few applications may inciude the monitorng of @ 
temperalure @ Numidity @ wind speed @ wind direction ® 
intensily @ pressure @ RPM @ soli morsture and many more 


PRICE $129.00 


20K Onms Typ 


flow © 
light 


DIGITAL INPUT/OUTPUT BOARD 


@ Provides 8 buffered outputs to a standard 16 pin socket for standard 
dip ribbon cable connection. 


@ Power-up reset assures that all outputs are off when your Apple i 
first lurned on. 


@ Features 8 inputs that can be driven from TTL logic or any 5 volt 
source 


@ Your inputs can be anything from high speed logic to simple 
switches. 


@ TOTALLY compatible with all CP/M software. 
@ Executes the full Z-80 and 8080 instruction set. 
@Allows you to run your Apple CP/M based programs. 


@ Does EVERYTHING the other 2-80 boards do, plus supports 280 
Interrupts 


® Hardware and software settable switch options. 


@ Anon-card PROM eliminates many I.C.'s for a cooler, less power 
consuming board 


@ Complete documentation included. (user must furnish software) 


@ Very simple to program. just PEEK at the data 

@ 4 other outputs are also provided. User 1. reset, interrupt request, 
non-maskabie mterrupt. 

@ Now on one card, you can have 8 digital outputs and 8 digital inputs 
each with its own connector. The super input/output board is your 
best choice for any control application. 

PRICE $62.00 


Z-80 CARD 


PRICE $139.00 


Since our inception Applied Engineering has continually expanded its line of Apple peripherals bring:ng yOu easy 10 use designs 
We are the innovators nol the smitalors Ulilizing state-of the ant technologies Appled Enqineering 1s continually improving its products The above represe 

recent development Applied Engineering offers you the highest quality peripherals al tne lowest possibte price 

Applied Engineering s products are tully lested with complete documentation and avaiable for immediate delivery All products are guaranteed with a one year 
warranty 

Send Check or Money Order to 
APPLIED ENGINEERING 
P.O. Box 470301 


Dallas, TX 75247 


See Your Deater 
or Call (214) 492-2027 
7 Days a Week 
Master Card & Visa Welcome 


All Orders Shipped Same Day. 
Texas Residents Add 5% Sales Tax. 


Add $10.00 If Outside U.S.A. 
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DFB DeFine Byte K BM 
Defines one or more bytes. 
SC: Use .DA, preceding each expression with "#". 


DFC DeFine Character L (old version) 
Data definition, byte expression list 
SC: Use .DA directive, preceding each expression with "#", 


DFS DeFine Storage L 

Reserve a block of bytes. An optional second operand will 
cause the reserved bytes to be set to the specified value. 

SC: Use .BS directive. No option to set the reserved bytes to 
a specified value. 


DO DO K BM 
Start a conditional assembly block. 
SC: Use .DO directive. 


DPH De PHase L 
Terminates a PHS directive. 
SC: Not available. 


DS Data Storage TK BM 
Reserve a block of bytes. 
SC: Use .BS directive. 


DSC Data SeCtion L (old version) 
Not sure what this was for. 


DSECT Dummy SECTion K 

Starts a block in which the object code bytes are not written 
on the output file. 

SC: Not available. 


DW Define Word K T 
Defines a 16-bit value, with the low-byte stored first. 
SC: Use .DA directive. 


EL ELse L SC 

For conditional assembly. 

ELSE ELSE K BM 

For conditional assembly, toggles the truth value from the DO 
directive, 


SC: Use .ELSE directive. 


END END of program LITIBMW 

Most assemblers REQUIRE an "END" directive at the end of the 
source code. S-C allows it but does not require it. 

SC: Use .EN directive. 


ENTRY ENTRY K 

Indicates a symbol is to be made reference-able from other 
separately-assembled modules. To be used by a linking loader 
program, which Apple does not provide. 

SC: Not available. 
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QuIGKTRACE 


relocatable program traces and displays the actual machine operations, while it is running 
without interfering with those operations. Look at these FEATURES: 


Single-Step mode displays the last instruction, 
next instruction, registers, flags, stack contents, 
and six user-definable memory locations. 


Trace mode gives a running display of the Single- 
Step information and can be made to stop upon 
encountering any of nine user-definable 
conditions. 


Background mode permits tracing with no display 
until itis desired. Debugged routines run at near 
normal speed until one of the stopping cond- 
Itions is met, which causes the program to return 
to Single-Step. 


QUICK TRACE aliows changes to the stack, 
registers, stopping conditions, addresses to be 
displayed, and output destinations for all this 
information. All this can be done in Single-Step 
mode while running. 


Two optional display formats can show a sequence 
of operations at once. Usually, the information 
is given in four lines at the bottom of the screen. 


QUICK TRACE is completely transparent to the 


program being traced. It will not interfere with 
the stack, program, or I/O. 


QUICK TRACE /s relocatable to any free part of 
memory. its output can be sent to any slot or to 
the screen. 

QUICK TRACE is completely compatible with 
programs using Applesoft and Integer BASICs, 
graphics, and DOS. (Time dependent DOS 
operations can be bypassed.) It will display the 
graphics on the screen while QUICK TRACE Is 
alive. 

QUICK TRACE is a beautiful way to show the 
incredibly complex sequence of operations that 
a computer goes through in executing a program 


QuItcKTRACE $50 


Is atrademark of Anthro-Digital, Inc. 
Copyright © 1981 
Written by John Rogers 
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See these programs at participating Computeriand and other 


fine computer stores. 


Anthro - Digital Software, Inc. 


P.O. Box 1385 Pittsfield, MA 01202 
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EOM End Of Macro BM 
Marks end of a macro definition, 
SC: Use .EM directive. 


EPZ Equate Page Zero L 

label EPZ expression 

Defines the label to have the value of the expression, which 
must be from $00 to SFF. When EPZ-defined labels are used in 
address fields, zero-page addressing mode will be used whenever 
possible. 

SC: Use .EQ directive. SC automatically uses page-zero mode 
whenever possible. 


EQU EQUate LTK BMW 

label EQU expression 

Defines the label to have the value of the expression during 
the assembly process. 

SC: Use .EQ directive. 


ESP End ScratchPad W 
Works with SPD to bracket a data section. 
SC: Not needed. 


EXP EXPansion of macros BM 

Controls whether macro expansion code is printed or not on the 
output listing. 

SC: Use .LIST directive. 


EXTRN EXTeRNal K 

Indicates that a label is externally defined. To be used with 
a linking loader program, which Apple does not provide. 

SC: Not available. 


FI end of conditional L SC 


FIN end of conditional K BM 
SC: Use .FIN directive, 


FLS FLaSH BM 

Define a string in flashing mode. 

SC: Not available, but a combination of .AS and .HS directives 
will do the job. 


GEN GENerate code listing L 
Turns on listing of all object code bytes. 
SC: Not available, object code listing is always on. 


HBY High BYte L 

Define one-byte data value, storing only the high-byte of an 
expressions value. 

SC: Use .DA directive, writing "/" before the value. 


HEX HEXadecimal data LTBM 


label HEX hexstring 
SC: Use .HS directive. 
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MACHINE LANGUAGE SPEED 
xiv er~Ma eT~IVLAY LE ic WHERE IT COUNTS... 


IN YOUR PROGRAM! 


For the first time, Amper-Magic makes it easy for people who don’t know 
machine language to use its power! Now you can attach slick, finished machine 
language routines to your Applesoft programs in seconds! And interface them 
by name, not by address! 


You simply give each routine a name of your choice, perform the append pro- 
cedure once at about 15 seconds per routine, and the machine language becomes a 
permanent part of your BASIC program. (Of course, you can remove it if you want to.) 


Up to 255 relocatable machine language routines can be attached to a BASIC 
program and then called by name. We supply some 20 routines on this disk. More 
can be entered from magazines. And more library disks are in the works. 


These routines and more can be attached and accessed easily. For example, 
to allow the typing of commas and colons in a response (not normally allowed in 
Applesoft), you just attach the Input Anything routine and put this line in your program: 


xxx PRINT “PLEASE ENTER THE DATE.”; : & INPUT,DATES 


&-MAGIC makes it Easy to be Fast & Flexible! 
PRICE: $75 


&-Magic and Amper-Magic are trademarks of Anthro-Digital, Inc. 
Applesoft is a trademark of Apple Computer, Inc. 


Some routines on this disk are: 


Binary file info 

Delete array 
Disassemble memory 
Dump variables 

Find substring 

Get 2-byte values 
Gosub to variable 
Goto to variable 

Hex memory dump 
Input anything 

Move memory 
Multiple poke decimal 
Multiple poke hex 
Print w/o word break 
Restore special data 
Speed up Appiesoft 
Speed restore 

Store 2-byte values 
Swap variables 


Anthro - Digital Software 


P.O. Box 1385 
Pittsfield, MA 01202 


The People - Computers Connection 
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ICL InCLude L 
Really is a CHAIN to next source file. 
SC: Use .IN directive. 


~IF conditional assembly L 

SC: Use .DO directive. 

INV INVerted characters L BM 

Generates a string of characters in Apple's INVERSE screen 
code, 


SC: Not available, but you can convert to hexadecimal and use 
~-HS directive. 


LET label reassignment L 
Same as EQU, except label can be redefined during assembly. 
SC: Not available. 


LST LiST option LTKBM 
Turn assembly listing on or off. 
SC: Use .LIST directive. 


MAC MACro definition BM 
Start a macro definition. 
SC: Use .MA directive. 


MSB Most Signficant Bit K 

Controls whether the ASC directive generates bytes with the 
first bit set or clear. 

SC: Use .AS or .AT directives with or without the "-" before 
the first delimiter to indicate the MSB value, 


NLS No List option L 
Turn assembly listing off. 
SC: Use .LIST OFF directive. 


NOG NO Generate L 

Turns off listing of all but first three bytes of any 
particular source line. 

SC: Not available. 


OBJ OBJect address LTBM 

Set actual memory address for assembled object code to be 
stored in. 

SC: Use .TA directive. 


ORG ORiGin LTK BM 
Set memory address program will execute at. 
SC: Use .OR directive. 


PAG PAGe eject on listing LTBM 
Sends control-L to listing device. 
SC: Use .PG directive. 


PAGE PAGE eject on listing K 


Sends control-L to listing device, 
SC: Use .PG directive. 
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PAU PAUSe and force error LBM 
SC: Not available. 


PHS PHaSe L 
Allows setting ORG without changing OBJ. Terminated with DPH. 
SC: Not available. 


PMC Present MaCro BM 
Opcode to call a macro. 
SC: Not needed, macros are called by their own names. 


PR# Select printer slot T 
SC: Select before assembly begins using DOS "PR#slot" command, 
or SC "PRT" command. 


REL RELocatable object K 

Causes assembler to generate a relocation dictionary at the end 
of the object file, for use by Apple's relocating loader. 

SC: Not available. 


REM REMark WwW 
Used to indicate a comment line. 
SC: Use "** in first column of label field. 


REP REPeated character K 

Generates a string of repetitions of the current CHR value on 
the output listing. Used to save space in the source file. 
SC: Not needed, because SC automatically compresses repeated 
characters. 


SAV SAVe object code BM 
SC: Use .TF directive. 


SBTL SuBTitLe K 

Provides a title line for the top of each page of the output 
listing. 

SC: Use .TI directive. 


SKP SKiP lines K BM 
Leaves a specified number of blank lines in the output listing. 
SC: Not available, 


SPD ScratchPaD WwW 
Works with ESP to bracket a data section. 
SC: Not needed, 


STR STRing L 
Similar to Lisa's ASC except the first byte output is the 
length of the string. 
SC: labela .DA #labelb 
-AS /string/ 
labelb .EQ *-labela-l 


SYM SYMbols T 

Produces a symbol cross-reference table at end of assembly. 
SC: Not available, but can use Rak-Ware's XREF utility 
program. 
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TITL TITLe 

TTL TiTLe L 

Generates title line at top of each page of listing. 
SC: Use .TI directive. 


TR TRuncate object listing BM 
Limit listing of object code to 3 bytes per source line. 
SC: Not available. 


USR USeR directive L 

An extra entry in the directive table for the user to use as he 
sees fit. 

SC: Use .US directive. 


; comment indicator L 
SC: If "3" was in first column, use "*" instead. If in later 
column, no special character is needed. 


= equate B M others 

If written with label on left, this is the same as EQU and .EQ 
directives. If written with "*" on the left, it is the same as 
ORG and .OR directives. 


KCK BM 
Alternate syntax for EOM. 
SC: Use .EM directive. 


>>> BM 
Alternate syntax for PMC. 
SC: Not needed, because macros are called by their own names. 


Directives in Roger Wagner's Book 


If you have been trying to learn using the S-C Assembler with 
Roger's book “Assembly Lines: The Book", you may have been 
frustrated by his use of several assembler directives. He 
discusses directives on pages 16-18, and 55. 


On page 16, the first example of the use of directives has two 
errors. Lines 6 and 7 are written: 


6 OBJ EQU $300 
7 ORG EQU $300 


But they should be: 6 OBJ $300 
7 ORG $300 


That is, OBJ and ORG are directives, not labels. The top two 
lines on page 21 are also incorrect, in that the ORG and OBJ 
directives were typeset to look like labels; they should be 
moved over to the opcode column, and the "$300" values to the 
operand column. 
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In all, Roger uses only five directives in his book: OBJ, ORG, 
EQU, ASC, and HEX. To use his programs in the S-C assembler, 
change: 


From TO 
label EQU value label .EQ value 
label HEX hexdigits label .HS hexdigits 
HEX hexdigits ~-HS hexdigits 
label ASC "characters" label .AS -"characters" 
ASC “characters" AS -"characters" 
OBJ $300 or $302 omit this line 
ORG $300 or $302 OR $300 or $302 


Note that the normal translation of "OBJ" is ".TA"; however, 
when the address is the same as the ORG/.OR address, it is not 
necessary to use OBJ/.TA. Furthermore, in the S-C Assemblers 
you must put the ".OR" line BEFORE the ".TA" line. In Roger's 
examples these two lines are reversed. 


DISASM (Version 2.2) $30.00 
Use DISASMN, the intelligent disassenbler, to convert 6502 machine code into meaningful, symbolic source. 
It creates a text file which is directly compatable with DOS ToolKit, LISA and S-C (both 4.0 & Macro) 
Assemblers. Use DISASH to customize existing machine language programs to your own needs or Just to see 
how they work. DISASH handles aultiple data tables, invalid op codes and displaced object code (the 
program being disassembled doesn’t have to reside in the memory space in which it executes). DISASN lets 
you even substitute MEANINGFUL labels of your own choice (100 commonly used Monitor & Pg Zero names 
included in Source form to get you rolling). The address-based cross reference table option results in 
either a selective or complete cross reference (to either screen or printer). Page Zero and External 
references are listed separately in numeric order. The cross reference table provides as much insight 
into the inner workings of machine language programs as the disassembly itself. DISASH has proven to be 
an invaluable aid for both the novice and expert alike. 


Utilities For Your S-C Assembler (4.0) 
SC.6SR: A Global Search and Replace Eliminates Tedious Manual Renasing Of Labels ooeeees 0920.00 
SC.XREF: A Linenumber-Based Global Cross Reference Table For Complete Source Documentation 
SC.TAB: Tabulates Source Files Into Neat, Readable Form. Encourages Fast, Free-Format Entry....$15.00 
SC UTILITY PAK: Includes All Three Utilities Described Above (You Save $10.00)....csscesseveees $45.00 


All of the above programs are written entriely in machine language and are provided 
on a standard 3.3 DOS formatted diskette. 


Avoid A $3.00 Shipping/Handl ing Charge By Mailing Full Payment With Order 
RAK -WA RE 


41 Ralph Road 
West Orange NJ 07052 


HHH SAY YOU SAW IT IN “APPLE ASSEMBLY LINE’! sees 


Page 14....Apple Assembly Line....September, 1982....Copyright (C) S-C SOFTWARE 


Relocatable AmperSand-VeCtoOr...c.ccccccvecccseseeeeee Steve Mann 


In recent issues of AAL there have been a variety of routines 
to produce relocatable code. The BSR, BRA and LEAX opcodes in 
the June issue and the run-anywhere subroutine calls in the 
July issue are two examples. 


However, in making some of my code relocatable, I encountered a 
new problem with routines that interface with Applesoft 
programs through the & command. The problem is that the 
routine doesn't know what address to place in the & jump vector 
because that address may change with each run. 


A rather inelegant solution is to derive the address from 
Applesoft's pointers, then POKE it into the & vector before 
calling it. What I wanted was a method to determine the 
correct address from within the code itself, in much the same 
way that a non-relocatable program sets up the vector: 


1000 LDA #$4C 

1010 STA AMPER.VECTOR 
1020 LDA #START 

1030 STA AMPER.VECTOR+t1 
1040 LDA /START 

1050 STA AMPER.VECTOR+2 
1060 * 

1070 START 


I have written a short routine which will handle the 
initialization at the beginning of relocatable programs, as 
long as the program's entry point immediately follows, as in 
the sample program listed below. 


The routine works by first jumping to the subroutine at S$FF58, 
which is simply an RTS instruction. As Bob explained in the 
July AAL, this places the return address on the stack and then 
pops it back off again. The return address can then be found 
by reading the first two open bytes below the stack. The TSX 
instruction in line 1100 loads the offset to those two bytes 
into the X-register. Lines 1110-1130 load the bytes into the 
A- and Y-registers. 


Now we have the address of the third byte of the JSR RETURN 
instruction - the MSB in Y and the LSB in A. What we need is 
the address of the program's entry point, which corresponds to 
the label START. To get that address, we must add in the 
length of the rest of the SETUP routine, that is, the 
difference between the address at START and the address in the 
Y- and A-registers. 


This is handled in lines 1140-1170. Line 1150 adds the offset 
($1B for this particular routine) to the low byte of the base 
address. The extra 1 in the ADC intruction is necessary 
because the address in Y and A is one less than the actual 
return address (corresponding to .1). Lines 1160-1170 check 
for a carry and adjust the high byte if necessary. The entry 
point address is then saved in the ampersand vector at 
S3F5-S3F7. 
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ANMIPERWARE 


THE ULTIMATE ENHANCEMENT TO APPLESOFT™ BASIC 


There are a number of Applesoft enhancement packages on the 
market which use the ampersand reserved word to gain access to 
assembly language routines from BASIC. None can match the ease 
of use, speed or powerful features of Amperware. Just BLOAD 
AMPERWARE and you have access to an extended Instruction set 


which will make your programs smaller, faster, more professional 
and easier to write. No knowledge of assembly language Is 
required and there are not POKEs, PEEKs, CALLs or I[IImitations on 


variables. 


—— FEATURES ~~ 


FLEXIBLE DATA ENTRY -- The &INPUT command allows rapid creation 
of video forms with IIne editing (Insert/delete character, clear 
to end, etc.), upper/l!ower case and numeric error checking. 
Control codes handIiIng Is easy wlth the &ON CTRL GOTO statement. 


RAPID DISK I/0 -- Read or write numeric or string Information to 
the disk Is binary up to 20 times faster than In BASIC. Compact 
storage format saves 25-75% of disk space. Q&READ/&WRITE whole 
arrays or even IIsts of arrays with one statement. 


FORMATTED OUTPUT -- &PRINT WITH will print [In regular, 
exponential or accounting format (negative In parentheses). 
Complete control of: significant digits; decimal sign; dollar 
sign; comma placement; fill characters (blank, zero or asterlsk). 
Handles text In the format and will place text Into format 
fleltds with right/left justification or centering. 


MANY OTHERS -- Sort 8-10 times faster (direct or Indexed); delete 
arrays; rapIld substring search; GOTO/GOSUB to computed IIne 
number; simple text window control; hardware Independent cursor 
and screen control; etc. 


ALL THIS FOR ONLY $49.95 
add $1.50 shIippIng and handling 


SCIENTIFIC SOFTWARE PRODUCTS, INC. 
3171 Donald Avenue 
Indianapolis, IN 46224 


IN residents add 4% tax VISA and MC accepted 
* Applesoft Is a trademark of Apple Computer Co., Inc. 
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1000 #----------- + - - - 


0100- 1010 STACK EQ $100 
03F5- 1020 AMPER.VECTOR .EQ $3F5 
FFog- 1030 RETURN EQ $FF58 
FC58- 10 0 HO Q 
1020 OR $300 
19 0 . TF B.AMPEXAMPLE 
0300- 20 58 FF 1090 SETUP JSR RETURN PUT CURRENT ADDR ON STACK 
0303- BA 1100 .1 TSX GET STACK POINTER FOR OFFSET 
0 0 ~ BC 00 01 1110 LDY STACK ,X MSB OF ADDR ON STACK 
0308- BD 00 01 1130 LDA STACK ,X LSB 
0 oc 69 1B 1150 ADC #START-. 141 OFFSET TO ENTRY POINT 
0310- C8 1170 INY (Y) IS HI BYTE 
0311- 8D F6 03 1180 .2 STA AMPER.VECTOR+1 LSB OF ENTRY ADDRESS 
0314- 8C F7 03 1190 STY AMPER.VECTOR+2 MSB 
0317- AS 4 1200 LDA #$4C JMP OPCODE 
0319- 8D F5 03 1210 STA AMPER.VECTOR 
031C- 60 1220 . RTS 
2 ese e eee wew eee eee sees ewes weawooowe 
031D- 20 58 FC 1386 START JSR HOME CLEAR SCREEN 
0320- EA 1250 NOP DO WHATEVER 
0321- EA 1260 NOP YOU LIKE 
0322- 60 1270 RTS 


The same principle can be used to set up the monitor's 
control-Y vector at S$3F8-S$3FA. As a matter of fact, I usually 
use a macro with conditional assembly to set up whichever 
vector I need. Here's the macro: 


1000 ~MA VECTOR 
1010 JSR SFF58 
1020 :1 TSX 

1030 LDY $100,X 
1040 DEX 

1050 LDA $100,X 
1060 CLC 

1070 ADC #:3-:1l1+1 
1080 BCC :2 

1090 INY 

1100 :2 dO ‘'J1l='Y CTRL-Y? 
1110 STA $3F9 
1120 STY S3FA 
1130 LDA #S4C 
1140 STA S$3F8 
1150 ~ ELSE OR &? 
1160 STA S3F6 
1170 STY $3F7 
1180 LDA #S$4C 
1190 STA S3F5 
1200 ~FIN 

1210 RTS 

1220 :3 

1230 . EM 
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Just include this definition at the beginning of your program. 
Then macro can then be called like this: 


2000 >VECTOR , Y 
2010 START ... 


to set the control-Y vector, or like this: 


2000 >VECTOR, & 
2010 START... 


to set the ampersand vector. (Actually any character other 
than Y will result in setting the & vector.) 


(Note: When I showed this macro to Bob I asked him if the .DO 
in line 1100 would really work. He looked at it for a minute 

and said, “yes, it sure will. The assembler's macros are even 
more powerful than I thought!"...Bill) 


RAM/ROM PROGRAM DEVELOPMENT BOARD $35.00 
Plugs into any Apple slot. Holds one user-supplied 2Kx8 memory chip. Use a 6116 type RAN chip for 
program development or Just extra memory. Plugin a programmed 2716 EPROM to keep your favorite routines 
‘on-line’. Maps into $Cn00-$CnFF and $C800-SCFFF memory space. Instructions & circuit diagram provided. 


The “MIRROR? ;: Firmware for Apple-Cat $27.00 
Communications ROM plugs directly into Novation’s modem card. Three basic modes: Dumb Terminal, Remote 
Console & Programmable Modem. Added features include: Printer buffer, Pulse or Tone dialing, true 
dialtone detection, audible ring detect and ring-back option. Directly supports many 80-column boards 
(even while printing) and Apple’s Comm card commands. ‘(Apple-Cat Hardware differences prevent 1007 
interchangability with Coma card.) Includes Hayes-to-AppleCat register equivalances for software 
conversion. Telephone Software Connection (213-516-9430) has several programs which support the ‘MIRROR’. 


The “PERFORMER’ : Smarts For Your Printer $49.00 
Get the most from your smart printer by adding intelligence to your ‘dumb’ interface card. The PERFORMER 
Board plugs into any Apple slot for immediate access (no programs to find and ‘oad). Easily select 
printer fonts and many other features via a user-friendly menu. Replaces manual printer set-up. No need 
to remember ESC commands. Also provides TEXT and GRAPHICS screen dumps. Compatible with Apple, Tymac, 
Epson, Microtek and similar ‘dumb’ Centronics type parallel I/F boards. Specify printer: | EPSON MX80 
W/Graftrax-80, EPSON MX100, EPSON MX80/MX100 W/Graftrax Plus, NEC 80238, C.Itoh 8510 (ProWriter), OKI 
Microline 82A/83A W/OKIGRAPH. (OKI Bonus: The PERFORMER Generates GYHANCED and DOUBLE STRIKE Fonts) 


Avoid A $3.00 Shipping/Handl ing Charge By Mailing Full Payment With Order 
RAK ~-WA RE 
41 Ralph Road 
West Orange NJ 07052 


wait SAY YOU SAW TT IN ‘APPLE ASSEMBLY LINE’! ste 
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About Hardcore MagaZin€....ccecescevceceseeee- BOD Sander—Cederlof 


I have received several calls by subscribers who wonder about 
the ad from Hardcore magazine. The ad prices a subscription at 
$20, but does not say clearly what $20 buys. 


To my knowledge, HARDCORE has published two issues so far: the 
first one about a year ago, and the second about six months 
ago. 


Inside the front cover of the first issue you will find the 
following message: 


"Attention Subscribers: Although presently only a 
quarterly magazine, HARDCORE Computing will go 
bimonthly and then monthly as soon as possible. 
Meanwhile, your one-year subscription is for the 4 
quarterly issues plus 8 UPDATES (printed on the other 
8 months) and all ALERT Bulletins sent out whenever 
we feel information is too important to wait. The 
UPDATES will be reprinted in part or in whole in the 
next magazine. The magazines, UPDATES, and ALERT 
Bulletins comprise the subscription package." 


I have talked with the publisher, Chuck Haight, several times 
on the phone. I believe he intends to fulfill every 
subscription, but he is having trouble getting the magazine out 
on a regular schedule. I asked him how often the magazine is 
published, and he answered "Very infrequently". He did 
re-assure me that a subscription buys four issues, 


Note that Softkey Publishing is another company with the same 
people. Two callers indicated they are quite satisfied with 
the software they bought from Softkey. 


APPLE EPROM PLUG™ 


@REPLACE any or all Apple II ROMs with EPROMs with NO Apple modifi- 
cations. CUSTOMIZE the F8 Autostart ROM to change prompt - change 
NMI, IRQ and Reset vectors to control any program. Other custom informa- 
tion furnished. eSECURITY by putting Apple or program serial number etc., 
in “free” F8 ROM locations. eOTHER FEATURES- Very small, 1 3/16”L x 
11/16"W x 5/16"H - no interference with language card in Slot #@ - up to5” 
card in other slots without interference. 


SPECIAL LIMITED OFFER - Prime EPROM and programming 
for $10.00 plus $1.75 postage with EPROM PLUG purchase. 
TO ORDER: Send $14.95 plus $1.75 postage for each unit - VISA and 


Mastercard accepted. TO: MARTCOMM, INC., Dept. B, P.O. Box 74, 
Mobile, AL 36601 or call (205) 342-7259 after 6 PM CDT. 
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Isn't it time that you found out the true story 
behind the most controversial user-oriented 
computer magazine around today? Over 64 
pages of facts, programming aids and pro- 
gram listings that includes columns on HOW TO: 
1. Copy-protect disks, 2. Normalize ‘‘unlistable”’ 
programs, 3. Use bit-copy programs to make 


back-ups of the “uncopiables,” 4. Write your 
own adventure-arcade games, 5. Market your 
software, and 6. Learn all about DOS. 


eee eee 


Dept. AL-1 
PO Box 44549 
Tacoma, WA 98444 


NAME 


ADDRESS 


———» —_— —_——— - ee —_— 


The most controversial 
computer magazine 
for serious Apple-Users. 


“HARDCORE 


Computing 


“HARDCORE Computing warns pirates 
about the latest technology that companies 
are using against them.” TIME, Feb. 8, 1982 


“When some Apple enthusiasts heard 
about the boycott (of bit-copy ads), they con- 
cluded that it was nothing but censorship and 
another example of the magazines ignoring 
the average Apple user to placate their adver- 
tisers. So they started their own publication, 
HARDCORE Computing " ESQUIRE, Jan. 1982 
Subscriptions: | 

$20.00 U.S.A. | 

$32.50 Mexico | 

| 

| 


$28.50 Canada 
$42.00 Others 
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No More Paddle Interaction. ...cccccccccccccccececeveeeMike Laumer 


While working on the FLASH! Integer BASIC Compiler I ran into a 
nasty little problem because the compiled code ran too fast! 
That's right, too fast. The old problem with reading the game 
paddles too soon after one another rose to byte (punny huh!) me 
once again. 


Basically the game paddle problem is that they are read with a 
variable time delay loop. Because one paddle may read 
Significantly faster than another, and the paddles have only 
one trigger to fire all four of the paddles, you might process 
the data fast enough to be ready to read the next paddle before 
it has finished its previous time delay. This problem is real 
and occurs in many of the game programs to be found on the 
Apple. Even Raster Blaster has the problem in its jittery ball 
release thrust adjuster. 


In the example below paddle 0 and 1 are triggered by the $c070 
paddle I/O trigger address. But because paddle 0 has a smaller 
value, it finishes before paddle 1. If you read one paddle 
after another with little other processing then one paddle 
seems to affect the value of the other one. Many programmers 
have shown this problem to their dealer thinking that they have 
found a new bug in the Apple but the only problem (if one 
exists) is the lack of independent paddle triggers for each of 
the four paddles. 


The problem appears if you use the following BASIC program and 
play with the paddle adjustments. Turn paddle 1 to the middle 
of its scale and paddle 0 to the low end of its scale and you 
will see changing paddle 0 affects the value read for paddle l. 
You will find that paddle 1 will vary by 20-40 counts without 
even touching it. 


10 PRINT PDL(0),PDL(1) GOTO 10 


: teteteteteten + 
-| | momen paddle 0 
5 ieetesteatenteatentetetatentetententaaten + 
~| | caine paddle 1 
: paddle expires 


paddles are triggered at this time 


So what can be done about the problem? What I did is design a 
routine that reads the paddle without triggering it and waits 
for the paddle to shut off. This is easily done by calling the 
monitor paddle read routine at SFB21, skipping the trigger 
instruction at SFBlE. This takes care of much of the problem, 
but I still found it necessary to add a tiny delay loop before 
triggering the paddle. The extra delay is probably due to the 
remaining charge in the internal capacitor in the timer chip. 
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CAN YOU PROGRAM YOUR SERIAL CARD? 
NOW YOU CAN. 


The SPI card gives your APPLE II* 
computer a new dimension to serial I/O: 
firmware on RAM. This allows you to adapt 
the SPI to virtually any RS-232 serial device. 
It gives you total control. 


BSAVE your SPI programs on disk. Then 
BLOAD the one you want directly into the 
SPI RAM. Anytime. Even on boot-up. 


Control characters select the various 
features and modes: dumb terminal, 
remote computer, and printer interface. 
However, if you like to customize your 
firmware or have an unusual device to 
operate, well-documented source list- 
ings are included. 


Now the frosting. The SPI RAM can be 
used to store machine language routines 
and utilities safely out of main memory. It’s 
a new way to use peripheral memory. 


The SPI costs only $99.50 including 5'cable 
and documentation. For longer cable 
lengths add $1.00 per foot. 

*APPLE is a trade mark of Apple Computer Inc. 


YOU HAVE TOTAL CONTROL 


e Firmware in 2K x 8 static RAM. 

e Control CTS, DSR, DTR, RTS, RLSD. 

e Control baud rate, word length, 
parity, etc. 


e Programs supplied for: RAM test, 


UART, terminal mode, remote mode, 
printer mode. 


e | year warranty. 


FM PANATRONICS.... 


Box 1088 Stone Mountain, GA 30086 


PRICE: $99.50* 


POST PAID 


CARD NO. 


*Georgia residents please add 
3% state sales tax and local 
sales tax if applicable. Postage 
prepaid inside continental U.S. 
(outside U.S. add $5.00). All 
payments must be made in U.S. 
dollars. Please allow 4 to 6 
weeks for delivery. 


CITY 


STATE 


LJ Check or Money Order 


ADDRESS 


LJ VISA L] MasterCard 


EXPIRATION DATE 
AUTHORIZED SIGNATURE 


NAME (please print) 


FM PANATRONICS. Box 1088, Stone Mountain, GA 30086 
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The assembly language routine which follows is basically what I 
added to the FLASH! compiler runtime package to take care of 
its being too fast for its own good! This explains 14 of the 
36,000 bytes of object code in the FLASH! Compiler system. 
There is also a DEMO program which reads both paddles and 
displays the values in hexadecimal so you can test the routine. 


1010 # READ PADDLES 


1020 ® PADDLE NUMBER IN A REGISTER 
1030 ® USES A,X,Y REGISTERS 
100 § RETURNS PADDLE VALUE IN Y REGISTER 
1060 ® THIS PADDLE READ ROUTINE 
1070 ® WILL PREVENT ALMOST ALL PADDLE 
1080 ® INTERACTION PROBLEMS DUE TO 
1090 ® ONLY 1 PADDLE TRIGGER FOR 
1100 § ALL PADDLES. 
FBIE- 1120 MON.PREAD .EQ $FB1E 
0800- 29 03 1180 READP AND #3 PDL 0 - 3 
0803- 20 21 FB 1160 JSR MON.PREAD+3 MAKE SURE PADDLE IS READY 
0808- 88 1160 61 DEY KLUDGE DELAY FOR 
0809- DO FD ~—s-: 1190 BNE .1 CIRCUIT READY 
O80B- 4C 1E FB 1200 JMP MON.PREAD TRIGGER AND READ 
1210 # PADDLE RESULT IN Y REGISTER 
O80E- £9 00 1230 DEMO LDA #0 READ PADDLE 0 
0810- 85 24 — 1240 STA $24 HTAB COLUMN 1 
OB Ise SB 08 1326 YA TAPP VALUE TO A 
O81 20 DA FD 1206 JSR $FDDA PRINT VALUE IN HEX 
O819- £6 24 1270 INC $24 LEAVE SPACE ON SCREEN 
O81B- A9 01 ‘1280 LDA #1 READ PADDLE 1 
oR Ap 6B 08 1595 dy, READP VALUE TO A 
0821- 20 DA FD 1300 JSR $FDDA PRINT VALUE IN HEX 
O824- 4C OE 08 1310 IMP DEMO AGAIN AND AGAIN... 


An Apple Bibliography 


Bob Broedel has been keeping track of all the books, magazines, 
etc. that are of interest to Apple owners. The last time I saw 
the list (May 1982), it was ten pages, two columns. Each entry 
includes all the bibliographic data Bob knows, so that you can 
find the items you want. 


This is the most complete list I have ever seen. If you want a 


copy, he will send you one for $2. Write to Bob Broedel, P. O. 
Box 20049, Tallahassee, FL 32304. 
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SOUND 


Now, from the programming experts at S.D.S., 
an easy-to-use way of putting the POWER 
and SPEED of machine language routines in 
YOUR OWN APPLESOFT PROGRAMS! 


ROUTINE MACHINE does all the work for you — 
no knowledge of machine language pro- 
gramming, whatsoever, is required. Simply 
choose the routine you need from an ever- 
growing library, and Routine Machine will 
effortlessly put them in your program, and 
all done transparently! No need to be aware 
of or bother with BLOAD’s, HIMEM.:, efc. 


Best of all, with just this starter package, you'll 
have the routines to put High Resolution 
graphics and sound in your programs im- 
mediately! Also included is a versatile print 
using module to banish the “decimal point 
demons” forever! To round out the package, 
we've also included powerful search and 
sort routines (for single dimension arrays; 
Search: 1000 elements in 1 second. Sort: 1000 


Sean eeeeeseeeseeseaeseseeeeeneseeeeveeneseaegeeeaeane 


OUR GUARANTEE 


IF YOU DON'T SAVE MORE THAN THE PUR- 
CHASE PRICE OF ‘ROUTINE MACHINE’ IN 
YOUR OWN PROGRAMMING TIME IN THE 
FIRST 30 DAYS YOU OWN IT, SIMPLY RE- 
TURN IT FOR A COMPLETE REFUND, NO 
QUESTIONS ASKED! 


(RR RRRERRERRERRERRERRRRRERR RRR RRER RARE RRA 


eeeaeaaeaeeee eee eeeeee 
Sseeeeneeaeeneaeaeeaeeaaca 


elements in 90 seconds), and a number of 
other often-needed routines as well (30 
routines in alll). 


Additional library disks titled “Ampersoft Pro- 
gram Library” are already available. 


some of the other routines in The Routine 
Machine (plus others not listed) are: 


SWAP: Swaps two string or numeric values. 


TEXT OUTPUT: Prints with no “word break’ on 
screen. 


STRING OUTPUT: Input any string, regardless of 
commas, etc. 


ERR: Stack fix for Applesoft ONERR handling. 


GOTO, GOSUB: Allows computed §state- 
ree Example: GOTO X *5o0r GOSUB 


BLOAD: Load any binary file 5 times faster 
than normal. Hi-Res pictures load in 
under 2 seconds. 


RESET HANDLER: Treats [RESET with ONERR; or 
will RUN or reboot disk. 


HI-RES ASCII: Character set for mixing text 
Hi-Res graphics. 


TURTLE GRAPHICS: Versatile Hi-Res graphics 
routines for easy drawing of Hi-Res 
figures. 


soutnwestern dato systems 


P.O. BOX 582 « SANTEE, CALIFORNIA 92071 « TELEPHONE: 714/562-3670 
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Some Fast Screen TrickS....cccccccvcccvecececeee BOD Sander-Cederlof 


Sometimes the standard Apple Monitor screen functions are too 
Slow. No reflection on Steve Wozniak, because he wrote them to 
be general and compact rather than quick. 


I am thinking particular of the screen clear (HOME to Applesoft 
users) and the screen scroll subroutines. They were both 
written to operate on a text window, not necessarily the whole 
screen. But most of the time you do want to clear or scroll 
the whole screen. 


The primary text screen memory is mapped into the addresses 
from $400 through S7FF, but not in an obvious or 
straightforward way. This table shows the actual memory 
addresses for each screen line: 


Line Addresses Line Addresses Line Addresses 
0 $400-$427 8 $428-S44F 16 $450-$477 
1 $480-S$4A7 9 $4A8-S4CF 17 $4D0-S4F7 
2 $500-$527 10 $528-S54F 18 $550-$577 
3 $580-$5A7 11 $5A8-S$5CF 19 S$5DO-S5SF7 
4 $600-$627 12 $628-S64F 20 $650-S$677 
5 $680~-S6A7 13 S$6A8-S6CF 21 $6D0-S6F7 
6 $700-$727 14 $728-$74F 22 $750-$777 
7 $780-S6A7 15 $7A8-$7CF 23 $7DO-S7F7 


Note that 120 consecutive bytes are used for three text lines 
Spaced at an 8-line interval. Then 8 bytes are not used. Then 
the next 120, and so on. Those 8 sets of 8 bytes that are not 
used by the screen mapping are used by peripheral cards and DOS 
for temporary storage. In the standard Apple Monitor 
subroutines, a subroutine named BASCALC at $FBC] calculates the 
starting address for a specified line. Then the various screen 
functions use that address, which is kept up-to-date in 
BASL,BASH ($28,29). 


In the listing that follows, I have included fast subroutines 
to clear the entire text screen (CLEAR); to set the entire text 
screen to whatever character is in the A-register (SET); to 
Clear the entire Lo-Res Graphics screen (GCLEAR); and to scroll 
the entire text screen up one line. For demonstration 
purposes, I also wrote routines to set the entire screen to 
each value from $00 through SFF; to alternate the screen 
between solid black and solid white until a key is pressed; to 
scroll end-around, placing the old top line on the bottom of 
the screen while moving the rest of the lines up; and to 
continuously scroll end-around until a key is pressed. 


For comparison, I counted that the Wozniak's screen clear takes 
15537 microseconds; mine takes only 5410 microseconds. The 
fastest possible would be one LDA #SA0 followed by 960 "STA 
S$xxx" and an RTS; that would take 3848 microseconds. (All 
these times round off the Apple's cycle time to one 
microsecond; actually it is a little faster.) 
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Transform 
your slow DOS 3.3 into 


HyperDOS 


with HOW FAST IS HYPERDOS? 
HyperDOS creater LOAD: DOS 3.3 HyperDOS 


A machine-language Hi-respicture 13.0sec. 3.1sec. 

program that MmoOdi- 100sector 

fies the “in-memory binary program 24.0 sec. 5.6 sec. 

image” Of DOS 3.5. pasic program 24.0sec. 4.5 sec. 

1. Use HyperDOSs as your HELLO program. 

2. INITialize your new disks with HyperDOSs. 
3. Replace the old, slow DOS on your disks. 


RUA BOATENG 
4 1 a AeA fi 


PUA UE VA UTA 
SUra ry hk PT Ne oe Se nay 
Wt aioe 
. . € 


Batt, 
e 


FoR oni HyperDOS CREATER on disk 
yper “ER on dis 
US funds only $19 35 Requires 48K Apple II 
SoftKey Publishing PLUS 
Dept. AL a fully-commented source code listing 


P.O. Box 44549 
Tacoma, WA 98444 a FREE copy Of HARDCORE Computing 
(296) 531-1684 the magazine for serious Apple-users 
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1000 # S.SCREEN TRICKS 
1920 * FAST SCREEN CLEAR SUBROUTINE 
O800- AQ 00 1080 GCLEAR LDA #0 
0802- 2¢ 1050 -HS 2C SKIP OVER NEXT TWO BYTES 
0803- AQ AO 1060 CLEAR LDA #$A0 
0805- AO 77 1970 SET —_LDY #119 
O807- 99 00 O04 1080 .1 STA $400,Y LINES: 0 8 16 
O80A- 99 00 05 1090 STA $500,Y 210 18 
O80D- 99 00 06 1100 STA $600,Y 4 12 20 
0810- 99 00 07 1110 STA 19052 6 1h 22 
0 13- 93 0 O4 1120 STA 80,¥ 1 9 1 
0816- 0 05 1130 STA $580,Y 3111 
0819- 0 06 1140 STA 680,¥ 5 13 21 
081C- 0 07 1150 STA $780,Y 7 15 23 
O81F- 1160 DEY 
0820- 10 E5 1170 BPL .1 
0822- 60 1180 RTS 
1190 #---------------------- +--+ 
1200 ‘ SET SCREEN TO ALL VALUES 
0823- A2 00 1220 SETALL LDX #0 
0825- 8 1230 1 TXA 
0826- 20 05 08 1240 JSR SET 
0829- E8 1250 INX 
O82A- DO F9 1260 BNE .1 
082C- 60 1270 RTS 
1280 #-----------~-------~------------ 
1290 ® ALTERNATE SCREEN UNTIL KEY PRESSED 
O82D- AQ 20 1310 ALTER LDA #$20 INVERSE BLANK 
O82F- 20 05 08 1320 JSR SET 
0832- 20 03 08 1 39 JSR CLEAR 
0835- AD 00 CO 13 0 LDA $c000 
0838- 10 F 1350 BPL ALTER 
O83A- 8D 10 CO 1360 STA $C010 
083D- 60 1379 . RTS 
1390 * FAST SCROLL UP SUBROUTINE 
083E- AO 77 1410 SCROLL LDY #119 
O840- BO 00 O4 1420 .1 LDA $400,¥ SAVE LINES: 0 8 16 
0843- 4 1430 PHA 
O84h- BO 80 04 1440 LDA $480,Y MOVE 1>0, 9>8, 17>16 
O847- 99 00 O4 1450 STA $400,Y 
O84A- BO 00 05 1460 LDA 700,¥ MOVE 2>1, 1029, 18>17 
O84D- 99 80 0 1470 STA $480,Y 
0850- B9 80 05 1480 LDA $580,Y MOVE 3>2, 11>10, 19>18 
0853- 99 00 05 1490 STA $500,Y 
0856- B9 00 06 1500 LDA $600,Y MOVE 4>3, 12>11, 20>19 
0859- 99 80 05 1510 STA $580,Y 
085C- B9 80 06 1520 LDA $680,Y ET CETERA 
O85F- 99 00 06 1530 STA $600,Y 
0862- B9 00 07 1540 LDA 100,¥ 
0865- 99 80 0 1590 STA $680,Y 
0868- B9 80 07 1560 LDA $780,Y 
O86B~ 99 00 07 1570 STA $700,Y 
O86E- 1580 PLA MOVE 8>7, 16>15 
OB6F- CO 28 1590 CPY #40 
0871- 90 0 1600 BCC .2 DISCARD OLD LINE 0 
0873- 99 58 07 1610 STA $780-40,Y 
0876- 1620 .2 DEY 
O877- 10 C7 16 30 BPL .1 
0879- 60 1640 . RTS 
1660 ® SCROLL AROUND, MOVING TOP LINE TO BOTTOM 
1670 Baennn eo eee ee eee ee 
O87A- AO 27 1660 SCR _—LDY £39 SAVE TOP LINE ON STACK 
087C- B9 00 O4 1690 .1 LDA $400,Y 
O87F- 4 1700 PHA 
0880- 88 1710 DEY 
0881- 10 F9 1720 BPL .1 
0883- 20 3E 08 1730 JSR SCROLL SCROLL SCREEN UP ONE LINE 
0886- AO 00 17h0 LDY #0 STORE OLD TOP LINE 
0888- 68 1750 .2 PLA ON BOTTOM OF SCREEN 
0889- 99 DO 07 1760 STA $7D0,Y 
O88C- ¢C 1770 INY 
O88D- CO 28 1780 CPY #40 
O88F- 90 F7 17.90 BCC 
0891- 60 1800 RTS 
1810 #--------------- we meenenenen nee 
1820 ® ROTATE SCREEN UNTIL KEY PRESSED 
0892- 20 7A 08 1886 s JSR SCR SCROLL AROUND ONCE 
0895- AD 00 CO 1850 LDA $CO00 ANY KEY PRESSED? 
0898 0 F8 1860 BPL ; NO, SCROLL AGAIN 
O89A- 8D 10 CO 1870 STA $CO10 YES, CLEAR STROBE 
O89D- 60 1880 RTS .. AND RETURN 
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Right arrow for the VIDEX patcheS......eceeeeeeeeMike Laumer 


The VIDEX 80 column board patches for the S-C Macro Assembler 
in last months Apple Assembly Line was a welcome article for 
me. You see I bought a VIDEX board last November but have no 
software to run it. I've been planning to write a program 
development editor similar to the one I used at Texas 
Instruments, but so far I haven't had the time between the 
FLASH! compiler, MIKE'S MAGIC MATRIX and the American Heart 
association CPR Training system. 


The patches were very usable, but a major problem still existed 
to prevent my use on a regular basis. The right arrow key 
would not copy characters from the VIDEX Screen. Try to copy a 
file name from your catalog with that limitation! 


I knew it could be done, because the VIDEX software in ROM has 
to do that function. Don Taylor mentioned last month that he 
didnt know the right routine to call and his ROM differed from 
the listing in the VIDEX manual. My listing was a little off 
also from my ROM, but I didn't care becase I wasn't going to 
call the ROM routines, 


I used the VIDEX manual's listings to locate the section that 
performed the copy-character-from-screen function and used 
Similar code in the RDKEY routine of last month's VIDEX patches 
for the Macro assembler. The 'BNE' to '.3' was changed to go 
to 'CTRLU' and the copy function coded to process the right 
arrow key for the VIDEX 80 column board. 


I needed two temporary variables to save the X- and Y- 
registers, so I used the first two bytes of the normal Apple 
text screen at $400 and $401. Another temporary variable is at 
$402. Since the normal Apple text display is not operative 
while the VIDEX is enabled you can use it for temporary 
variable space without it affecting the screen display. If you 
try a trick like this some time, you must be careful because 
some of the monitor routines like HOME and SCROLL can easily 
zap your storage when you least expect it. 


With this new capability of the right arrow key functioning as 
expected, I am able to use the VIDEX patches often in my 
software development work. But there are a few problems left 
yet to solve that I didn't get to look into before writing this 
article. They are: 


l. A RETURN key should clear to the end of line on line 
input, but not EDIT input. 


2. The control character display features are not handled 
very well by the VIDEX patches. 


3. The patches blow up on Reset. (I think.) 


4. The patches blow up on INT or FP commands. 
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5. The patches don't work very well when you use MNTR 
command. 


6. All calls to SFC9C (the Monitor clear to end of line 
routine) should send $9D to the VIDEX board. 


7. Right arrow, left arrow, and any printing key cause 
the entire EDIT line to be redisplayed. The flicker 
is somewhat annoying. 


The listing that follows should replace lines 4020 through 
4420 of the listing on pages 21 and 22 of the August 1982 
issue, 


The source code on the AAL Quarterly Disk #8 will have 
these lines already merged with Don Taylor's patches. 


Special Note: S-C Macro Cross Assembler 
Motorola 6800/6801/6802 Version 


The 6801 microprocessor is an enhanced version of the 
6800 cpu. It has 11 new opcodes, plus an additional 
addressing mode for the JSR instruction. Be sure not to 
use any of these new opcodes if you are assembling code 
which must execute in a 6800 system! 


JSR direct (9D xx) 

ABX Add B to X 

ADDD Add M,M+l to D 

ASLD Arithmetic shift left D 
BRN Branch Never 

LDD Load D from M,Mtl 
LSRD Logical shift right D 
MUL Multiply A * B into D 
PSHX Push X 

PULX Pull X 

STD Store D at M,M+tl 

SUBD Subtract M,M+l from D 


If you attempt to use "JSR addr" where "addr" is in page 
zero, the new direct addressing mode will be used. If 
you are programming for a 6800 cpu, that is not 
acceptable. To override the assembler's choice, use ".DA 
#SBD,addr". You can use a macro "JSR" if you have a lot 
of them. 
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N020; Weseosensee see sescs aloe Sis o. 
4025 V.BASEL .EQ $478+SLOTNUM 


4030 V.BASEH .EQ $4F8+SLOTNUM 
CTRL-U COPY KEY 


10 3 ve CHORZ .E Ea £7 8+SLOTNUH Meet CTRLU cu . 

Hous V:OLDCHAR ne $678 is 3 sTX #00 

4055 V.DEVO .EQ SLOTNUM® 16 +$C080 4245 LDA V.CHORZ 
4060 V.DISPO "EQ gcco 4250 JSR PSNCALC 
HOcg Bee coo 1526 Cpa i DISPO,x 
407 Be ee ee ge ee 4265 BCC 

4080 RDKEY LDA KEYBOARD ate 1 LDA V. DISP1,X 
4085 BPL RDKEY 1S > «2 ORA #$80 

4090 STA KEYSTROBE neat STA V.OLDCHAR 
4095 ORA #$80 nebe LDX too 

4100 CMP #$81 Shift lock? 4995 DY $401 

4192 as LCVERSION 4300 = 

4115 JSR UNPROTECT.LC.RAM 1305 PRUCALG EEG aces 
4125 LSR SCM.SHIFT. FLAG ree STA V.XSAV1 
4130 BPL .2 Return with errant key hase LDA #0 

W139 1 CMP #$9A Shift unlock? 4 25 ADC V.BASEH 
4140 BNE CTRLU No, return with key 30 LSR 

4145 .DO LCVERSION 4335 PHP 

4150 JSR UNPROTECT.LC.RAM 4340 AND #3 

4455 .FIN i 45 ASL 

4160 SEC 4 50 ASL 

4465 ROR SCM.SHIFT.FLAG i 23 TAY 

ree 2 LDA #396 stonteeers with errant key 4365 ae V.DEVO,Y 
1196 BIT $C080 Reprotect LC RAM i316 oes V.XSAV1 
1 __ Aner 
4195 UNPROTECT.LC.RAM 

4200 BIT $C08 Enable Bank 2 

4205 BIT §C08 

4210 FIN 

4215 RTS 

4220 # 


Plug-in compatibility 


320K bytes of RAM (200NS) memory designed 
to function like two 35 track floppy disk drives 


Compatible with Apple DOS 3.3 and Apple 
Pascal 11 


Same size as the Apple Disk Il* Drive 


Invisible memory refresh - even with the Apple 
turned off 


Rechargeable battery system built-in to pro- 


the Apple Il and Apple Il Plus® provides access 


Apple 


speeds never before available. The Axlon memory 
system is designed to interact with Apple DOS 
3.3° and Apple Pascal 1.1” like two standard flor- 
py disk drives while delivering the lightning fast 
access speeds of RAM memory This also leaves 
32K of RAM for advanced programming techni- 
ques. The interface board is slot independent and 
draws no power from your Apple. The 
rechargeable battery system built into the unit 
provides three hours of backup in the event of a 
power loss. Drop by your local Apple dealer or 
contact Axion, Inc. for more information. 


Trademark of Apple Computer Inc 
Pasca: is a Trademark of UCSD Regents 
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Slot independent interface board draws no 


power from your Apple 


All firmware is in static RAM on the interface 
board 


Includes software for diagnostic. fast load and 
copy routines, and business applications 


Re 


AXLON 


170 N. Wolfe Road, 


Sunnyvale, CA 94086 
(408) 730-0216 


a 
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A Note on the Underline Cursor.......+.+e+.eBOb Sander-Cederlof 


Bill Linn's "Blinking Underline Cursor" program generated a lot 
of interest. However, Allan Blackburn from Fort Worth had a 
problem with it: 


"It works just fine, until you hit RESET or 
re-boot...then it must be BRUN again to get it back, 
You can't enter monitor and type 300G, or use CALL 
768 from Applesoft. Why doesn't calling the routine 
reset KSWL and KSWH? It should, but I always end up 
with S9E81 there. Even though lines 1210-1250 store 
$09 in $38 and $03 in $39, it seems they never get 
there. Can you explain this? Please? 


Sure, Allan. Line 1250 needs to be changed from RTS to JMP 
S3EA. 


This is a common problem. I had it myself back when DOS first 
came out. For the first year or so we only had a tiny 
preliminary manual, and the subject wasn't covered. Now the 
DOS manual is so large we forget to read it or where to find 
the information, Look on pages 100-105 of the DOS manual and 
you will find a full explanation. 


Briefly, here is what happens. Lines 1210-1250 DO store the 
address $309 into #38 and $39. But the next time you print a 
character, DOS gets control and stores its own input address 
right on top of yours. DOS's input address is $9E8l. 


The same thing happens in Applesoft programs if you use IN#1l 
(for example) instead of PRINT CHRS$(4)"IN#1", and then print a 
character. Note 7b on page 105 tells about CALL 1002, which is 
$3EA. 
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